/**
 * 使用方法: 初始化Canlendar对象, 然后调用其show方法. new Calendar().show(obj);
 */
var cal;
var isFocus = false; // 是否为焦点

/**
 * 日历类
 * 
 * @param before
 *            前溯多少年, 默认50
 * @param after
 *            后延多少年, 默认50. 两者构成可选年份范围
 * @param lang
 *            0(中文) 可自由扩充, 默认0
 * @param formatstr
 *            时间格式,可选ymdHMSs,如"yyyy-mm-dd";
 */
function Calendar(formatstr, before, after, lang) {
	this.create = new Date();// 对象创建时间

	// 可选年份范围
	if (null == before || "" == before)
		before = 50;
	if (null == after || "" == after)
		after = 50;
	this.beginYear = this.create.getFullYear() - before;
	this.endYear = this.create.getFullYear() + after;

	this.lang = null == lang ? 0 : lang;// 语言

	this.formatstr = null == formatstr ? "yyyy-mm-dd" : formatstr;// 时间格式

	// 各种控件id
	var cur = new Date().format("yyyymmddHHMMSSs");
	var rand = Math.floor(Math.random() * 100);
	this.calid = cur + "calendar" + rand;// 整个日历选择控件的id
	this.yearid = cur + "year" + rand;// 年选择控件的id
	this.monthid = cur + "month" + rand;// 月选择控件的id
	this.dayid = cur + "day" + rand;// 日选择控件的id
	this.hourid = cur + "hour" + rand;// 时选择控件的id
	this.minid = cur + "min" + rand;// 分选择控件的id
	this.secid = cur + "sec" + rand;// 秒选择控件的id

	this.target = null;// 目标控件,用于把日期写在其上

	this.panel = this.getElementById("calendarPanel");// TODO ???
	this.container = this.getElementById("ContainerPanel");// TODO ???
	this.form = null;

	this.date = new Date();// 保存当前选中的日期
	this.year = this.date.getFullYear();
	this.month = this.date.getMonth();

	this.colors = {
		"cur_word" : "#FFFFFF", // 当日日期文字颜色
		"cur_bg" : "#00FF00", // 当日日期单元格背影色
		"sel_bg" : "#FF0000", // 已被选择的日期单元格背影色 2006-12-03 寒羽枫添加
		"sun_word" : "#0000FF", // 星期天文字颜色
		"sat_word" : "#0000FF", // 星期六文字颜色
		"td_word_light" : "#333333", // 单元格文字颜色
		"td_word_dark" : "#CCCCCC", // 单元格文字暗色
		"td_bg_out" : "#E0F0FF", // 单元格背影色
		"td_bg_over" : "#FFCC00", // 单元格背影色
		"tr_word" : "#FFFFFF", // 日历头文字颜色
		"tr_bg" : "#4682be", // 日历头背影色
		"input_border" : "#CCCCCC", // input控件的边框颜色
		"input_bg" : "#EFEFEF" // input控件的背影色
	};

	this.draw();
	this.bindYear();
	this.bindMonth();
	this.changeSelect();
	this.bindData();
}

/**
 * 日历类属性（语言包，可自由扩展）
 */
Calendar.language = {
	"year" : [ [ "" ], [ "" ] ],
	"months" : [
			[ "一月", "二月", "三月", "四月", "五月", "六月", "七月", "八月", "九月", "十月",
					"十一月", "十二月" ],
			[ "JAN", "FEB", "MAR", "APR", "MAY", "JUN", "JUL", "AUG", "SEP",
					"OCT", "NOV", "DEC" ] ],
	"weeks" : [ [ "日", "一", "二", "三", "四", "五", "六" ],
			[ "SUn", "MON", "TES", "WEN", "THU", "FRI", "SAT" ] ],
	"clear" : [ [ "清空" ], [ "CLE" ] ],
	"today" : [ [ "现在" ], [ "Today" ] ],
	"close" : [ [ "关闭" ], [ "Close" ] ]
};

Calendar.prototype.draw = function() {
	calendar = this;

	var html = [];
	html[html.length] = '  <div id="'+this.calid+'" style="margin: 0px;">';
	html[html.length] = '    <table style="width:250px;" border="0" cellpadding="0" cellspacing="1">';
	html[html.length] = '      <tr>';
	html[html.length] = '        <th align="left" style="width:18px"><input style="border: 1px solid '
			+ calendar.colors["input_border"]
			+ ';background-color:'
			+ calendar.colors["input_bg"]
			+ ';width:16px;height:20px;" name="prevMonth" type="button" id="prevMonth" value="&lt;" /></th>';
	html[html.length] = '        <th align="center" style="width:210px"  nowrap="nowrap"><select name="calendarYear" id="calendarYear" style="font-size:12px;"></select><select name="calendarMonth" id="calendarMonth" style="font-size:12px;"></select></th>';
	html[html.length] = '        <th align="right" style="width:18px"><input style="border: 1px solid '
			+ calendar.colors["input_border"]
			+ ';background-color:'
			+ calendar.colors["input_bg"]
			+ ';width:16px;height:20px;" name="nextMonth" type="button" id="nextMonth" value="&gt;" /></th>';
	html[html.length] = '      </tr>';
	html[html.length] = '    </table>';
	html[html.length] = '    <table id="calendarTable" style="width:250px;" style="border:0px solid #CCCCCC;background-color:#FFFFFF" border="0" cellpadding="3" cellspacing="1">';
	html[html.length] = '      <tr align="center" >';
	for ( var i = 0; i < 7; i++) {
		html[html.length] = '      <th style="font-weight:normal;background-color:'
				+ calendar.colors["tr_bg"]
				+ ';color:'
				+ calendar.colors["tr_word"]
				+ ';">'
				+ Calendar.language["weeks"][this.lang][i] + '</th>';
	}
	html[html.length] = '      </tr>';
	for ( var i = 0; i < 6; i++) {
		html[html.length] = '    <tr align="center">';
		for ( var j = 0; j < 7; j++) {
			if (j == 0) {
				html[html.length] = '  <td style="cursor:default;color:'
						+ calendar.colors["sun_word"] + ';"></td>';
			} else if (j == 6) {
				html[html.length] = '  <td style="cursor:default;color:'
						+ calendar.colors["sat_word"] + ';"></td>';
			} else {
				html[html.length] = '  <td style="cursor:default;"></td>';
			}
		}
		html[html.length] = '    </tr>';
	}
	html[html.length] = '      <tr style="background-color:'
			+ calendar.colors["input_bg"]
			+ ';position:relative;"><td style="cursor:default;" colspan="7" style="position:relative;">';
	html[html.length] = '  		<span style="position:relative;width:22px;"><select id="'
			+ this.hourid
			+ '" style="position:absolute; clip:rect(auto 22px auto auto); border: 0px black solid;">';
	for ( var i = 0; i < 24; ++i) {
		var istr = i;
		if (i < 10)
			istr = "0" + i;
		html[html.length] = '  			<option value="' + i + '">' + istr
				+ '</option>';
	}
	html[html.length] = '  		</select>&nbsp</span>';
	html[html.length] = '  		<span style="position:relative;width:22px;"><select id="'
			+ this.minid
			+ '" style="position:absolute; clip:rect(auto 22px auto auto); border: 0px black solid;left:22px;">';
	for ( var i = 0; i < 60; ++i) {
		var istr = i;
		if (i < 10)
			istr = "0" + i;
		html[html.length] = '  			<option value="' + i + '">' + istr
				+ '</option>';
	}
	html[html.length] = '  		</select>&nbsp</span>';
	html[html.length] = '  		<span style="position:relative;width:22px;"><select id="'
			+ this.secid
			+ '" style="position:absolute; clip:rect(auto 22px auto auto); border: 0px black solid;left:44px;">';
	for ( var i = 0; i < 60; ++i) {
		var istr = i;
		if (i < 10)
			istr = "0" + i;
		html[html.length] = '  			<option value="' + i + '">' + istr
				+ '</option>';
	}
	html[html.length] = '  		</select></span>';
	html[html.length] = '		</td></tr>';
	html[html.length] = '      <tr style="background-color:'
			+ calendar.colors["input_bg"] + ';">';
	html[html.length] = '        <th colspan="2"><input name="calendarClear" type="button" id="calendarClear" value="'
			+ Calendar.language["clear"][this.lang]
			+ '" style="border: 1px solid '
			+ calendar.colors["input_border"]
			+ ';background-color:'
			+ calendar.colors["input_bg"]
			+ ';width:100%;height:20px;font-size:12px;"/></th>';
	html[html.length] = '        <th colspan="3"><input name="calendarToday" type="button" id="calendarToday" value="'
			+ Calendar.language["today"][this.lang]
			+ '" style="border: 1px solid '
			+ calendar.colors["input_border"]
			+ ';background-color:'
			+ calendar.colors["input_bg"]
			+ ';width:100%;height:20px;font-size:12px;"/></th>';
	html[html.length] = '        <th colspan="2"><input name="calendarClose" type="button" id="calendarClose" value="'
			+ Calendar.language["close"][this.lang]
			+ '" style="border: 1px solid '
			+ calendar.colors["input_border"]
			+ ';background-color:'
			+ calendar.colors["input_bg"]
			+ ';width:100%;height:20px;font-size:12px;"/></th>';
	html[html.length] = '      </tr>';
	html[html.length] = '    </table>';
	html[html.length] = '  </div>';
	this.panel.innerHTML = html.join("");

	/** ****** 以下代码由寒羽枫 2006-12-01 添加 ********* */
	var obj = this.getElementById("prevMonth");
	obj.onclick = function() {
		calendar.goPrevMonth(calendar);
	}
	obj.onblur = function() {
		calendar.onblur();
	}
	this.prevMonth = obj;

	obj = this.getElementById("nextMonth");
	obj.onclick = function() {
		calendar.goNextMonth(calendar);
	}
	obj.onblur = function() {
		calendar.onblur();
	}
	this.nextMonth = obj;

	obj = this.getElementById("calendarClear");
	obj.onclick = function() {
		calendar.target.value = "";
		calendar.hide();
	}
	this.calendarClear = obj;

	obj = this.getElementById("calendarClose");
	obj.onclick = function() {
		calendar.hide();
	}
	this.calendarClose = obj;

	obj = this.getElementById("calendarYear");
	obj.onchange = function() {
		calendar.update(calendar);
	}
	obj.onblur = function() {
		calendar.onblur();
	}
	this.calendarYear = obj;

	obj = this.getElementById("calendarMonth");
	with (obj) {
		onchange = function() {
			calendar.update(calendar);
		}
		onblur = function() {
			calendar.onblur();
		}
	}
	this.calendarMonth = obj;

	obj = this.getElementById("calendarToday");
	obj.onclick = function() {
		var today = new Date();
		calendar.date = today;
		calendar.year = today.getFullYear();
		calendar.month = today.getMonth();
		calendar.changeSelect();
		calendar.bindData();
		calendar.target.value = today.format(calendar.formatstr);
		calendar.hide();
	};
	this.calendarToday = obj;
	/** ****** 以上代码由寒羽枫 2006-12-01 添加 ********* */
};

// 年份下拉框绑定数据
Calendar.prototype.bindYear = function() {
	// var cy = this.form.calendarYear;
	var cy = this.calendarYear;// 2006-12-01 由寒羽枫修改
	cy.length = 0;
	for ( var i = this.beginYear; i <= this.endYear; i++) {
		cy.options[cy.length] = new Option(i
				+ Calendar.language["year"][this.lang], i);
	}
};

// 月份下拉框绑定数据
Calendar.prototype.bindMonth = function() {
	// var cm = this.form.calendarMonth;
	var cm = this.calendarMonth;// 2006-12-01 由寒羽枫修改
	cm.length = 0;
	for ( var i = 0; i < 12; i++) {
		cm.options[cm.length] = new Option(
				Calendar.language["months"][this.lang][i], i);
	}
}

// 向前一月
Calendar.prototype.goPrevMonth = function(e) {
	if (this.year == this.beginYear && this.month == 0) {
		return;
	}
	this.month--;
	if (this.month == -1) {
		this.year--;
		this.month = 11;
	}
	this.date = new Date(this.year, this.month, 1);
	this.changeSelect();
	this.bindData();
}

// 向后一月
Calendar.prototype.goNextMonth = function(e) {
	if (this.year == this.endYear && this.month == 11) {
		return;
	}
	this.month++;
	if (this.month == 12) {
		this.year++;
		this.month = 0;
	}
	this.date = new Date(this.year, this.month, 1);
	this.changeSelect();
	this.bindData();
}

// 改变SELECT选中状态
Calendar.prototype.changeSelect = function() {
	// var cy = this.form.calendarYear;
	// var cm = this.form.calendarMonth;
	var cy = this.calendarYear;// 2006-12-01 由寒羽枫修改
	var cm = this.calendarMonth;
	for ( var i = 0; i < cy.length; i++) {
		if (cy.options[i].value == this.date.getFullYear()) {
			cy[i].selected = true;
			break;
		}
	}
	for ( var i = 0; i < cm.length; i++) {
		if (cm.options[i].value == this.date.getMonth()) {
			cm[i].selected = true;
			break;
		}
	}
}

// 更新年、月
Calendar.prototype.update = function(e) {
	// this.year =
	// e.form.calendarYear.options[e.form.calendarYear.selectedIndex].value;
	// this.month =
	// e.form.calendarMonth.options[e.form.calendarMonth.selectedIndex].value;
	this.year = e.calendarYear.options[e.calendarYear.selectedIndex].value;// 2006-12-01
	// 由寒羽枫修改
	this.month = e.calendarMonth.options[e.calendarMonth.selectedIndex].value;
	this.date = new Date(this.year, this.month, 1);
	this.changeSelect();
	this.bindData();
}

// 绑定数据到月视图
Calendar.prototype.bindData = function() {
	// 添加时分秒支持
	$("#" + this.hourid).val(this.date.getHours());
	$("#" + this.minid).val(this.date.getMinutes());
	$("#" + this.secid).val(this.date.getSeconds());

	// 添加确定按钮
	$("#" + this.okid).click(function() {
		$(this.target).val();
	});

	var calendar = this;
	var dateArray = this.getMonthViewArray(this.date.getYear(), this.date
			.getMonth());
	var tds = this.getElementById("calendarTable").getElementsByTagName("td");
	for ( var i = 0; i < tds.length; i++) {
		// tds[i].style.color = calendar.colors["td_word_light"];
		tds[i].style.backgroundColor = calendar.colors["td_bg_out"];
		tds[i].onclick = function() {
			return;
		}
		tds[i].onmouseover = function() {
			return;
		}
		tds[i].onmouseout = function() {
			return;
		}
		if (i > dateArray.length - 1)
			break;
		tds[i].innerHTML = dateArray[i];
		if (dateArray[i] != "&nbsp;") {
			tds[i].onclick = function() {
				if (calendar.target != null) {
					calendar.target.value = new Date(calendar.date
							.getFullYear(), calendar.date.getMonth(),
							this.innerHTML).format(calendar.formatstr);
				}
				calendar.hide();
			}
			tds[i].onmouseover = function() {
				this.style.backgroundColor = calendar.colors["td_bg_over"];
			}
			tds[i].onmouseout = function() {
				this.style.backgroundColor = calendar.colors["td_bg_out"];
			}
			if (new Date().format(calendar.formatstr) == new Date(
					calendar.date.getFullYear(), calendar.date.getMonth(),
					dateArray[i]).format(calendar.formatstr)) {
				// tds[i].style.color = calendar.colors["cur_word"];
				tds[i].style.backgroundColor = calendar.colors["cur_bg"];
				tds[i].onmouseover = function() {
					this.style.backgroundColor = calendar.colors["td_bg_over"];
				}
				tds[i].onmouseout = function() {
					this.style.backgroundColor = calendar.colors["cur_bg"];
				}
				// continue; //若不想当天单元格的背景被下面的覆盖，请取消注释 → 2006-12-03 寒羽枫添加
			}// end if

			// 设置已被选择的日期单元格背影色 2006-12-03 寒羽枫添加
			if (calendar.target != null
					&& calendar.target.value == new Date(calendar.date
							.getFullYear(), calendar.date.getMonth(),
							dateArray[i]).format(calendar.formatstr)) {
				tds[i].style.backgroundColor = calendar.colors["sel_bg"];
				tds[i].onmouseover = function() {
					this.style.backgroundColor = calendar.colors["td_bg_over"];
				}
				tds[i].onmouseout = function() {
					this.style.backgroundColor = calendar.colors["sel_bg"];
				}
			}
		}
	}
}

// 根据年、月得到月视图数据(数组形式)
Calendar.prototype.getMonthViewArray = function(y, m) {
	var mvArray = [];
	var dayOfFirstDay = new Date(y, m, 1).getDay();
	var daysOfMonth = new Date(y, m + 1, 0).getDate();
	for ( var i = 0; i < 42; i++) {
		mvArray[i] = "&nbsp;";
	}
	for ( var i = 0; i < daysOfMonth; i++) {
		mvArray[i + dayOfFirstDay] = i + 1;
	}
	return mvArray;
}

// 扩展 document.getElementById(id) 多浏览器兼容性 from meizz tree source
Calendar.prototype.getElementById = function(id) {
	if (typeof (id) != "string" || id == "")
		return null;
	if (document.getElementById)
		return document.getElementById(id);
	if (document.all)
		return document.all(id);
	try {
		return eval(id);
	} catch (e) {
		return null;
	}
}

// 扩展 object.getElementsByTagName(tagName)
Calendar.prototype.getElementsByTagName = function(object, tagName) {
	if (document.getElementsByTagName)
		return document.getElementsByTagName(tagName);
	if (document.all)
		return document.all.tags(tagName);
}

// 取得HTML控件绝对位置
Calendar.prototype.getAbsPoint = function(e) {
	var x = e.offsetLeft;
	var y = e.offsetTop;
	while (e = e.offsetParent) {
		x += e.offsetLeft;
		y += e.offsetTop;
	}
	return {
		"x" : x,
		"y" : y
	};
}

// 显示日历
Calendar.prototype.show = function(dateObj, popControl) {
	if (dateObj == null) {
		throw new Error("arguments[0] is necessary");
	}
	this.target = dateObj;

	// if (dateObj.value.length > 0){
	// this.date = new Date(dateObj.value.toDate());
	// this.date = new
	// Date(dateObj.value.toDate(this.formatstr));//由寒羽枫修改，带入用户指定的 style
	this.date = (dateObj.value.length > 0) ? new Date(dateObj.value
			.toDate(this.formatstr)) : new Date();// 2006-12-03 寒羽枫添加 →
	// 若为空则显示当前月份
	this.year = this.date.getFullYear();
	this.month = this.date.getMonth();
	this.changeSelect();
	this.bindData();
	// }
	if (popControl == null) {
		popControl = dateObj;
	}
	var xy = this.getAbsPoint(popControl);
	this.panel.style.left = xy.x - 25 + "px";
	this.panel.style.top = (xy.y + dateObj.offsetHeight) + "px";

	// 由寒羽枫 2006-06-25 修改 → 把 visibility 变为 display，并添加失去焦点的事件
	// this.setDisplayStyle("select", "hidden");
	// this.panel.style.visibility = "visible";
	// this.container.style.visibility = "visible";
	this.panel.style.display = "";
	this.container.style.display = "";

	dateObj.onblur = function() {
		calendar.onblur();
	}
	this.container.onmouseover = function() {
		isFocus = true;
	}
	this.container.onmouseout = function() {
		isFocus = false;
	}
}

// 隐藏日历
Calendar.prototype.hide = function() {
	// this.setDisplayStyle("select", "visible");
	// this.panel.style.visibility = "hidden";
	// this.container.style.visibility = "hidden";
	this.panel.style.display = "none";
	this.container.style.display = "none";
	isFocus = false;
}

// 焦点转移时隐藏日历 → 由寒羽枫 2006-06-25 添加
Calendar.prototype.onblur = function() {
	if (!isFocus) {
		this.hide();
	}
}

// 以下由寒羽枫 2006-06-25 修改 → 用<iframe> 遮住 IE 的下拉框
/**//*
	 * //设置控件显示或隐藏 Calendar.prototype.setDisplayStyle = function(tagName, style) {
	 * var tags = this.getElementsByTagName(null, tagName) for(var i = 0; i <
	 * tags.length; i++) { if (tagName.toLowerCase() == "select" &&
	 * (tags[i].name == "calendarYear" || tags[i].name == "calendarMonth")){
	 * continue; } //tags[i].style.visibility = style; tags[i].style.display =
	 * style; } }
	 */
// document.write('<div id="ContainerPanel" style="visibility:hidden"><div
// id="calendarPanel" style="position: absolute;visibility: hidden;z-index:
// 9999;');
document
		.write('<div id="ContainerPanel" style="display:none"><div id="calendarPanel" style="position: absolute;display: none;z-index: 9999;');
document
		.write('background-color: #FFFFFF;border: 1px solid #CCCCCC;width:250px;font-size:12px;"></div>');
if (document.all) {
	document
			.write('<iframe style="position:absolute;z-index:2000;width:expression(this.previousSibling.offsetWidth);');
	document.write('height:expression(this.previousSibling.offsetHeight);');
	document
			.write('left:expression(this.previousSibling.offsetLeft);top:expression(this.previousSibling.offsetTop);');
	document
			.write('display:expression(this.previousSibling.style.display);" scrolling="no" frameborder="no"></iframe>');
}
document.write('</div>');
// var calendar = new Calendar(); //此句被 寒羽枫注释，否则 IE 将报错
// 调用calendar.show(target, popControl);
// -->
